vr2-5-02.wrl

---

[ VRML source code ]

#VRML V2.0 utf8
#vr2-5-02.wrl
DEF Timer TimeSensor {
  cycleInterval 10.0
  loop TRUE
}
DEF Deform PositionInterpolator {
  key [0.0, 0.25, 0.5, 0.75, 1.0]
  keyValue [ 
    1 1 1,
    0.75 1 1,
    0.5 1 1,
    0.75 1 1,
    1 1 1        
  ]
}
DEF Move1 PositionInterpolator {
  key [0.0, 0.25, 0.5, 0.75, 1.0]
  keyValue [ 
    0 0 0,
    0.25 0 0,
    0.5 0 0,
    0.25 0 0,
    0 0 0        
  ]
}
DEF Move2 PositionInterpolator {
  key [0.0, 0.25, 0.5, 0.75, 1.0]
  keyValue [ 
    0 0 0,
    -0.25 0 0,
    -0.5 0 0,
    -0.25 0 0,
    0 0 0        
  ]
}
DEF Sph1 Transform {
  children DEF Bio Shape {
    appearance Appearance {
      material Material {
        diffuseColor 1 1 0
      }
    }
    geometry Sphere { }
  }
}
DEF Sph2 Transform {
  children USE Bio
}

ROUTE Timer.fraction_changed TO Deform.set_fraction
ROUTE Deform.value_changed TO Sph1.set_scale
ROUTE Timer.fraction_changed TO Move1.set_fraction
ROUTE Move1.value_changed TO Sph1.set_translation
ROUTE Timer.fraction_changed TO Deform.set_fraction
ROUTE Deform.value_changed TO Sph2.set_scale
ROUTE Timer.fraction_changed TO Move2.set_fraction
ROUTE Move2.value_changed TO Sph2.set_translation